home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / basic / bmw2.zip / QBLIB.BAT < prev    next >
DOS Batch File  |  1989-02-19  |  3KB  |  65 lines
  1. echo off
  2. cls
  3. if exist qblib.lib del qblib.lib
  4. if exist qblib.qlb del qblib.qlb
  5. IF NOT EXIST QB.LIB GOTO NOQB
  6. IF NOT EXIST QB.BI GOTO NOQBBI
  7. :BEGINNING
  8. LIB QB *INTRPT*ABSOLUTE*INT86OLD,,;
  9. IF NOT EXIST APRINT.OBJ GOTO NOAPRINT
  10. IF NOT EXIST CURSOR.OBJ GOTO NOCURSOR
  11. IF NOT EXIST SHADOW.OBJ GOTO NOSHADOW
  12. IF NOT EXIST BITS.OBJ GOTO NOBITS
  13. IF NOT EXIST BLOCKMOV.OBJ GOTO NOBLOCKMOV
  14. IF NOT EXIST INTRPT.OBJ GOTO NOINTRPT
  15. LIB @QBLIB.LB
  16. ECHO IGNORE LIB.EXE WARNING U4156, IT IS MEANINGLESS IN THIS SITUATION
  17. LINK @QBLIB.LK
  18. GOTO SUCCESS
  19. :NOQBBI
  20. ECHO YOU NEED TO PUT A COPY OF QB.BI IN THIS DIRECTORY. QB.BI IS DISTRIBUTED
  21. ECHO WITH QuickBASIC.
  22. GOTO BEGINNING
  23. :NOAPRINT
  24. ECHO COULD NOT FIND APRINT.OBJ IN CURRENT DIRECTORY
  25. GOTO END
  26. :NOCURSOR
  27. ECHO COULD NOT FIND CURSOR.OBJ IN CURRENT DIRECTORY
  28. GOTO END
  29. :NOSHADOW
  30. ECHO COULD NOT FIND SHADOW.OBJ IN CURRENT DIRECTORY
  31. GOTO END
  32. :NOBITS
  33. ECHO COULD NOT FIND BITS.OBJ IN CURRENT DIRECTORY
  34. GOTO END
  35. :NOBLOCKMOV
  36. ECHO COULD NOT FIND BLOCKMOV.OBJ IN CURRENT DIRECTORY
  37. GOTO END
  38. :NOQB
  39. ECHO COULD NOT FIND A COPY OF QB.LIB IN CURRENT DIRECTORY
  40. ECHO QB.LIB IS DISTRIBUTED WITH QuickBASIC
  41. GOTO END
  42. :SUCCESS
  43. ECHO SUCCESS! QBLIB.LIB AND QBLIB.QLB HAVE BEEN CREATED.
  44. ECHO ┌───────────────────────────────┬────────────────────────────────────┐
  45. ECHO │CONTENTS OF QB.LIB AND QB.QLB  │ CONTENTS OF QBLIB.LIB AND QBLIB.QLB│
  46. ECHO │AS DISTRIBUTED WITH QuickBASIC │ AS JUST MANUFACTURED               │
  47. ECHO ├───────────────────────────────┼────────────────────────────────────┤
  48. ECHO │ 1. ABSOLUTE.OBJ               │ 1. ABSOLUTE.OBJ                    │
  49. ECHO │ 2. INTRPT.OBJ                 │ 2. INTRPT.OBJ                      │
  50. ECHO │ 3. INT86OLD.OBJ               │ 3. INT86OLD.OBJ                    │
  51. ECHO ├───────────────────────────────┼ And these additional object files ─┤
  52. ECHO │                               │ 4. APRINT.OBJ                      │
  53. ECHO │                               │ 5. BITS.OBJ                        │
  54. ECHO │                               │ 6. BLOCKMOV.OBJ                    │
  55. ECHO │                               │ 7. BLOCKMOV.OBJ                    │
  56. ECHO │                               │ 8. CURSOR.OBJ                      │
  57. ECHO │                               │ 9. SHADOW.OBJ                      │
  58. ECHO └───────────────────────────────┴────────────────────────────────────┘
  59. ECHO You can now use QBLIB.QLB and QBLIB.LIB whenever you would normally use
  60. echo QB.QLB and QB.LIB.
  61. if not exist qb.bi echo REMEMBER TO PUT A COPY QB.BI IN THIS DIRECTORY
  62. :end
  63.  
  64.  
  65.